﻿Public Class Horarios
    Private id As Integer
    Private horaini As String
    Private horafin As String
    Private hora As String
    Public Property pid() As Integer
        Get

            Return id
        End Get
        Set(ByVal value As Integer)
            id = value
        End Set
    End Property
    Public Property phoraini() As String
        Get
            Return horaini
        End Get
        Set(ByVal value As String)
            If value <> "" Then
                horaini = value
            End If

        End Set
    End Property
    Public Property phorafin() As String
        Get
            Return horafin
        End Get
        Set(ByVal value As String)
            If value <> "" Then
                horafin = value
            End If

        End Set
    End Property
    Public Property phora() As String
        Get
            Return hora
        End Get
        Set(ByVal value As String)
            If value <> "" Then
                hora = value
            End If

        End Set
    End Property
End Class
